home *** CD-ROM | disk | FTP | other *** search
- PXFUNLINK(3F) Last changed: 1-6-98
-
-
- NNAAMMEE
- PPXXFFUUNNLLIINNKK - Removes a directory entry
-
- SSYYNNOOPPSSIISS
- CCHHAARRAACCTTEERR*_n _p_a_t_h
- IINNTTEEGGEERR _i_l_e_n,, _i_e_r_r_o_r
- CCAALLLL PPXXFFUUNNLLIINNKK((_p_a_t_h,, _i_l_e_n,, _i_e_r_r_o_r))
-
- IIMMPPLLEEMMEENNTTAATTIIOONN
- UNICOS, UNICOS/mk, and IRIX systems
-
- SSTTAANNDDAARRDDSS
- IEEE standard interface for FORTRAN 77
-
- DDEESSCCRRIIPPTTIIOONN
- On IRIX systems, this routine is in lliibbffoorrttrraann..ssoo which is linked by
- default when compiling programs with the MIPSpro 7 Fortran 90 compiler
- or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
- 7.2 F77 compiler.
-
- The PPXXFFUUNNLLIINNKK routine uses the uunnlliinnkk(2) system call to remove a
- directory entry for the named file.
-
- When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
- UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
- kind unless documented otherwise. On UNICOS and UNICOS/mk, default
- kind is KKIINNDD==88 for integer, real, complex, and logical arguments; on
- IRIX, the default kind is KKIINNDD==44.
-
- The following is a list of valid arguments for this routine:
-
- _p_a_t_h An input character variable or array element containing the
- name of a file.
-
- _i_l_e_n An input integer variable containing the length of _p_a_t_h in
- characters. If _i_l_e_n is zero, all trailing blanks are
- removed before calling uunnlliinnkk.
-
- _i_e_r_r_o_r An output integer variable that contains a zero if the named
- file was removed.
-
- In addition to the errors returned by the uunnlliinnkk(2) system call,
- PPXXFFUUNNLLIINNKK may return the following errors:
-
- EEIINNVVAALL If _i_l_e_n < 0 or _i_l_e_n > LLEENN((_p_a_t_h)).
-
- EENNOOMMEEMM If PPXXFFUUNNLLIINNKK is unable to obtain memory to copy _p_a_t_h.
-
- EEXXAAMMPPLLEESS
- program test
- character*(12) path
- integer ilen, ierr
- path = 'testfile'
- ilen = 0
- call pxfunlink(path,ilen,ierr)
- if (ierr.ne.0) then
- print *,'FAIL: error from pxfunlink = ',ierr
- else
- print *,'PASS: No error from pxfunlink = '
- endif
- end
-
- SSEEEE AALLSSOO
- uunnlliinnkk(2)
-
- _A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-
- 2165, for the printed version of this man page.
-
-